home *** CD-ROM | disk | FTP | other *** search
/ PC Team 23 / HS_Tuning.iso / Optimisation / JV16 Powertools 1.6 / Setup.exe / {app} / Documentation / Example Scripts / 4. Real world examples / Computer name.jvb next >
Encoding:
Text File  |  2003-05-12  |  368 b   |  17 lines

  1. ShowMessage This little script will test if your computer's name contains the letter A.;
  2.  
  3.  
  4. Define computername;
  5. computername := [hostname];
  6.  
  7. ShowMessage Your computer's name is $computername;
  8.  
  9. If ([sPos "a" $computername] > 0)
  10. [
  11.  ShowMessage So, yes, it contains the letter A.;
  12. ] else 
  13. [
  14.  ShowMessage So, it doesn't contain the letter A.;
  15. ]
  16.  
  17. Terminate;